1 POKE53280,0:POKE53281,0
2 PRINTCHR$(14)"[147]"TAB(15)"[194]AMDOK 4"TAB(97)"VON"TAB(49)"[200]ANS-[202]UERGEN [218]IETHMANN"
3 PRINT"[194]ITTE DEFEKTE [215]EITER [212]REIBER [196]ISK 2.0"TAB(80)"IN DAS [204]AUFWERK LEGEN"
4 PRINT"UND EINE [212]ASTE DRUECKEN":WAIT203,64,64:OPEN1,8,15,"I":OPEN2,8,2,"#"
5 PRINT#1,"U1:"2;0;10;5:PRINT#1,"B-P"2;20:GET#2,A$:A=ASC(A$+CHR$(0))
6 IFA<>32THENPRINT"[147]NICHT AUF DIESER [196]ISK ANWENDBAR!":CLOSE2:CLOSE1:END
7 READN:IFN<0THEN9
8 PRINT#1,"M-W"CHR$(LB)CHR$(05)CHR$(1)CHR$(N):LB=LB+1:GOTO7
9 ON ABS(N) GOTO10,11,14
10 READ LB:GOTO 7
11 IF SI=1 THENPRINT#1,"U2:";2;0;T;S
12 READ T: READ S
13 PRINT#1,"U1:";2;0;T;S:SI=1:GOTO7
14 PRINT#1,"U2:";2;0;T;S:PRINT#1,"I"
15 CLOSE2:CLOSE1:PRINT"[215]EITER [212]REIBER NUN WIEDER"TAB(80)"VERWENDBAR!"
16 DATA-2,18,0,-1,0,18,1,65,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
17 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,20
18 DATA255,191,31,2,0,96,0,4,32,33,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
19 DATA0,0,5,129,1,3,18,255,255,3,9,85,85,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
20 DATA0,0,0,0,0,0,0,0,0,0,7,193,131,1,78,101,117,101,32,71,69,79,83,45,84,114
21 DATA101,105,46,160,160,160,81,70,160,50,65,160,160,160,160,19,8,71,69,79,83
22 DATA32,102,111,114,109,97,116,32,86,49,46,48,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0
23 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
24 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,-2,18,1,-1,0,18,9,130,1,16,76,67,45,49,48,32
25 DATA79,80,84,73,160,160,160,160,160,160,1,8,0,9,89,5,6,3,10,4,0,0,0,131,1,17
26 DATA99,101,110,116,45,50,52,160,160,160,160,160,160,160,160,160,1,9,0,9,88,12
27 DATA22,12,0,4,0,0,0,195,1,18,83,101,105,107,111,115,104,97,32,55,50,48,32,100
28 DATA160,160,1,10,0,9,86,4,7,15,0,3,0,0,0,195,1,0,83,101,105,107,111,115,104
29 DATA97,32,54,52,48,32,100,160,160,1,13,0,9,86,4,7,15,0,3,0,0,0,195,1,2,83,101
30 DATA105,107,111,115,104,97,32,54,52,48,32,101,160,160,1,15,0,9,86,4,7,15,0,3
31 DATA0,0,0,195,1,7,83,101,105,107,111,115,104,97,32,53,55,54,32,100,160,160,1
32 DATA20,0,9,86,4,7,15,0,3,0,0,0,195,2,14,83,101,105,107,111,115,104,97,32,57
33 DATA54,48,32,100,160,160,1,6,0,9,86,4,7,15,0,3,0,0,0,195,2,2,83,101,105,107
34 DATA111,115,104,97,32,49,49,53,50,32,100,160,2,15,0,9,86,4,7,15,0,3,0,-3